// TOWN SPECIAL ENCOUNTERS
//    Town 124: Silvar

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	set_personality_name(2480,"Kelda");
	set_personality_name(2481,"Vorgar");
	set_personality_name(2482,"Kilborn");
	set_personality_name(2483,"Gardner");

	set_crime_tolerance(max_crime);

	if (day_reached(66,0))
		wreck_block(13,25,20,32);

	if (day_reached(60,0))
		wreck_block(25,43,31,51);

	if (day_reached(70,0))
		wreck_block(25,14,32,22);

	if (day_reached(57,0))
		wreck_block(14,14,22,25);

	if (day_reached(40,0))
		wreck_block(22,20,31,29);

	if (day_reached(60,0))
		wreck_block(32,34,41,42);

	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12403,"Hmmm.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12403,"Interesting.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12403,"Pass that other book?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12403,"Um, need anything?");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12400,"Grrr.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12400,"Worms.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12400,"Back off.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12417,"Sacred profit!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12417,"Holy exchange.");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12417,"I can aid you!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12417,"I can combine for utility!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12402,"An adventurer!");
	if (get_ran(1,0,100) < 10)
		give_char_text_bubble(12402,"I am a wandering healer.");

break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

